home *** CD-ROM | disk | FTP | other *** search
/ Mission to McDonaldLand / Mission To McDonaldLand.iso / calnz.dxr / 00020_Script_Old mouse Rollover stuff < prev    next >
Text File  |  1998-10-25  |  2KB  |  76 lines

  1.  
  2.  
  3. on rollrel me
  4.   global stageSprite
  5.   set stageSprite = 48
  6.   puppetsprite stageSprite,true
  7.   set the castNum of sprite stageSprite to the myRollover of me
  8.   set the type of sprite stageSprite  = 16
  9.   set the ink of sprite stageSprite = 0
  10.   set the foreColor of sprite stageSprite = 255
  11.   set the backColor of sprite stageSprite = 0
  12.   set the loch of sprite stageSprite to the myRx of me + the loch of sprite the myChannel of me
  13.   set the locv of sprite stageSprite to the myRy of me + the locv of sprite the myChannel of me
  14.   set the stretch of sprite stageSprite = false
  15.   set the visible of sprite stageSprite = true
  16.   updatestage
  17. end
  18.  
  19. on unrollrel me
  20.   global stageSprite
  21.   puppetsprite stageSprite,false
  22.   
  23.   updatestage 
  24.   
  25. end
  26.  
  27. on rollabs me
  28.   global stageSprite
  29.   set stageSprite = 48
  30.   puppetsprite stageSprite,true
  31.   set the castNum of sprite stageSprite to the myRollover of me
  32.   set the type of sprite stageSprite  = 16
  33.   set the ink of sprite stageSprite = 0
  34.   set the foreColor of sprite stageSprite = 255
  35.   set the backColor of sprite stageSprite = 0        
  36.   set the loch of sprite stageSprite to the myRx of me
  37.   set the locv of sprite stageSprite to the myRy of me
  38.   set the stretch of sprite stageSprite = false
  39.   set the visible of sprite stageSprite = true
  40.   updatestage
  41. end
  42.  
  43. on unrollabs me
  44.   global stageSprite
  45.   puppetsprite stageSprite,false
  46.   updatestage  
  47. end
  48.  
  49. on null me
  50.   nothing
  51. end
  52.  
  53.  
  54. on unrollplay me
  55.   global stageSprite
  56.   puppetsprite stageSprite,false
  57.   updatestage  
  58. end
  59.  
  60.  
  61. on unrollrefresh me
  62.   
  63.   if the mystate of me="up" then
  64.     norm (me)
  65.   else
  66.     press(me)  
  67.   end if  
  68.   updatestage
  69.   refreshmovies()
  70. end
  71.  
  72.  
  73.  
  74.  
  75.  
  76.